home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
User's Choice Windows CD
/
User's Choice Windows CD (CMS Software)(1993).iso
/
win_u_z
/
vxb102.zip
/
VXBTEST.ZIP
/
VXFORM5.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1991-12-03
|
18KB
|
542 lines
VXFORM5
Aircraft Record
Form2-
Label4
Tms Rmn
Label5
Tms Rmn
Label6
Tms Rmn
Label7
Description
Tms Rmn
Label8
Tms Rmn
AirCode
Tms Rmn
AirNNo
Tms Rmn
AirType
Tms Rmn
AirTypeHelp
Tms Rmn
AirDesc
Tms Rmn
AirNet
Tms Rmn
Label9
Price
Tms Rmn
Label10
Tms Rmn
Label11
Annual
Tms Rmn
Label12
Tms Rmn
Label13
Gross Wt
Tms Rmn
Picture2
Label1
Since Overhaul
Tms Rmn
Label2
Major
Tms Rmn
AirSMOH
Tms Rmn
Label3
Tms Rmn
AirSPOH
Tms Rmn
Label16
Tms Rmn
AirSTOH
Tms Rmn
AirPrice
Tms Rmn
AirYear
Tms Rmn
Y AirAnnual
Tms Rmn
AirTTSN
Tms Rmn
AirGross
Tms Rmn
Label14
Empty Wt
Tms Rmn
Picture1
Frame13
Avionics
Tms Rmn
AirNav1
NavCom1
Tms Rmn
AirDME
Tms Rmn
AirNav2
NavCom2
Tms Rmn
AirRnav
Tms Rmn
AirADF
Tms Rmn
AirHSI
Tms Rmn
AirXpndr
Transponder
Tms Rmn
AirRMI
Tms Rmn
AirGlideSl
GlideSlope
Tms Rmn
AirRadar
Radar
Tms Rmn
Air3LMB
Tms Rmn
AirAutoP
Auto Pilot
Tms Rmn
AirAudioPan
Audio Panel
Tms Rmn
AirRadarAlt
Radar Altimeter
Tms Rmn
AirELT
Tms Rmn
AirDeice
Deice
Tms Rmn
AirEmpty
Tms Rmn
Label15
Fuel Cap
Tms Rmn
AirFuel
Tms Rmn
AirSave
&Save
3 AirCancel
&Cancel
5 AirDelete
&Delete
AirMemo
&Memo
AirExit
E&xit
Q AirStatus
Tms Rmn
Frame6_DragDrop|
Source
Frame13_DragDrop?
AirDataClear
BuyCode)
textF
CustKey
BuyType
BuyTypeDescb
BuyLow
BuyHighE
BuyStatus
AIrDesc_Change"
AirNav1_Click3
AirRnav_Click
AirXpndr_ClickX
Frame1_DragDrop
Frame3_DragDrop{
Label2_ClickW
Label3_Click
Frame4_DragDropJ
Frame10_DragDrop
AirYear_Change
AirSMOH_Change
AirNav2_Click
AirDME_ClickQ
Air3LMB_Click
AirCode
AirNNo3
AirType
AirDesc
AirPrice#
AirYear
AirAnnual
AirTTSNm
AirSMOHx
AirSPOH
AirSTOHY
AirGross
AirEmpty
AirFuel
AirNet
Air3LMB;
Value1
AirADF
AirAudioPanP
AirAutoP
AirDeice
AirDMEV
AirELT
AirGlideSl?
AirHSI
AirNav1J
AirNav2z
AirRadar
AirRadarAlt
AirRMI
AirRnav
AirXpndr
AirDataLoad
vxField
NumVal
vxDouble;
b_low
CustBuyer@
vxTrueK
c_eltp
Form_Click
Form_LostFocus
Form_Load
BuyerReturn
BROWSE_ADD
BuyerDataCleary
BuySave
Enabled
BuyCancel
BuyAddX
FALSE
BuyDelete
BROWSE_EDIT
BuyerDataLoad#
vxRecNo
AircraftReturn
CustMemo
AirStatus
AirSave
AirCancel"
AirDelete@
Aircraftturn
AirExit_Click
Form_UnloadZ
Cancel
vxClose
vxSelectDbfw
AirtypesDbf1
StatesOpen
AircustDbf!
VXFORM3
VXFORM5
AirAnnual_ChangeN
AirAnnual_GotFocus
SendMessage
GetFocus
EM_LIMITTEXT
vxFieldSize
AirEmpty_Change*
AirFuel_Change=
AirGross_Change
AirNet_Changea
AirNet_GotFocusv
AirEmpty_GotFocus
AirFuel_GotFocus
AirGross_KeyPressb
KeyAscii
AirNNo_Change
AirNNo_GotFocus
AirPrice_Change
AirPrice_GotFocus
AirSMOH_GotFocus1
AirSPOH_ChangeC
AirSPOH_GotFocusW
AirSTOH_Changei
AirSTOH_GotFocus}
AirTTSN_Change
AirTTSN_GotFocus
AirType_Change
AirType_GotFocus
AirYear_GotFocus
AirGross_GotFocus
AirAnnual_KeyPress
AirEmpty_KeyPress
AirFuel_KeyPress
AirNet_KeyPress3
AirPrice_KeyPressG
AirSMOH_KeyPress[
AirSPOH_KeyPresso
AirSTOH_KeyPress
AirTTSN_KeyPress
AirYear_KeyPress
AirNNo_KeyPress
AirType_KeyPress
AirCancel_ClickJ
AirDelete_Click
vxDeleteRec
TypeDataClear
TypeStatus<
TypeSave
TypeCancel
TypeAdd
TypeDelete
TypeReturn
FALSSE
AirMemo
AirType_LostFocus9
EmptyString
vxSeek
AirbuyerDbfk
AircraftDbf(
AirTypeHelp_Clickt
SaveReturn
BROWSE_USER
VXFORM4
vxSelectNtxz
AirtypesNtxp
vxBrowse
AirSave_Click
SeekKey^
CustCode
CustReturn
CustStatee
AirstateDbf
Airstat1Ntx
IsBuyer
IsSeller
CustSeller
WasBuyerb
WasSeller
RDate
CDate
vxDateFormat%
vxAppendBlank
vxReplString
CustName4
CustCompanyK
CustAddress
CustCity
CustZipX
CustPhRes
CustPhBus[
CustFax~
vxReplDate
vxWrite?
CustStatus:
vxReplDouble
IsTrue'
CursorWait
CursorArrow
AirMemo_Click
DisableCustData
CustAdd
CustBrowsem
CustCancelO
CustDelete3
CustExit
CustNext
CustPrevious|
CustSave
BuyRecs
Aircraft
RecNum/
vxMemoEdit
EnableCustDataC
DisableAirDatap
vxLockDbf
vxLocked
vxLockRecord
vxUnlock
vxInteger
vxLong
vxIsMemoc
Form_Paint
VisibleI
vxFormFrameW
vxCtlStyle
VX_RAISE
VX_RECESS
Picture1
CustCdate
CustRdate
CustDays
Picture2
VXRAISE
CurrHwnd
VXFORM2
SetFocusAPI
BROWSE_DELETE
TypeDelete_Click
AirReturn
vxCtlLength
AirCode_Change
vxWindowDereg
Form5Active
AirDataClear
AirDataLoad
c_nno"
c_cat"
c_desc
c_price"
#######0
c_year
c_annual
c_ttsn
#####0
c_smoh
c_spoh
c_stoh
c_gwt"
####0"
c_ewt"
####0"
c_fuelcap"
c_net"
#######0
c_lmb"
c_adf"
c_audpan
c_autop"
c_deice"
c_dme"
c_elt"
c_glidesl"
c_hsi"
c_navcom1"
c_navcom2"
c_radar"
c_radaral"
c_rmi"
c_rnav
c_xpndr"
Form_Load
Record addition request"
call general proc to load controls-
Edit record
AirExit_Click
Form_Unload
Form5Active = FALSE
AirAnnual_GotFocus
c_annual#
AirNet_GotFocus
c_net"#
AirEmpty_GotFocus
c_ewt"#
AirFuel_GotFocus
c_fuelcap"#
AirGross_KeyPress
{Tab}"
AirNNo_GotFocus
c_nno"#
AirPrice_GotFocus
c_price"#
AirSMOH_GotFocus
c_smoh#
AirSPOH_GotFocus
c_spoh#
AirSTOH_GotFocus
c_stoh#
AirTTSN_GotFocus
c_ttsn#
AirType_GotFocus
c_cat"#
AirYear_GotFocus
c_year#
AirGross_GotFocus
c_gwt"#
AirAnnual_KeyPress
{Tab}"
AirEmpty_KeyPress
{Tab}"
AirFuel_KeyPress
{Tab}"
AirNet_KeyPress
{Tab}"
AirPrice_KeyPress
{Tab}"
AirSMOH_KeyPress
{Tab}"
AirSPOH_KeyPress
{Tab}"
AirSTOH_KeyPress
{Tab}"
AirTTSN_KeyPress
{Tab}"
AirYear_KeyPress
{Tab}"
AirNNo_KeyPress
convert to uppercase
{Tab}"
AirType_KeyPress
convert to uppercase
{Tab}"
AirCancel_Click
AirDelete_Click
get user confirmation of delete
Confirm Delete
Delete failed"
Delete cancelled
AirType_LostFocus
catname"
AirTypeHelp_Click
Aircraft Type Help
j% = vxSelectDbf(AirtypesDbf) ' re-register database
category
catname"
AirSave_Click
verify something in the key field
Field cannot be empty"
verify unique key if adding
Duplicate Key on Add
verify that type code is in types file
Type code not found"
Data passed. Put it away
replace strings
c_code
c_nno"
c_cat"
c_desc
c_year
c_annual
replace numeric valuesl
c_price"
c_ttsn
c_smoh
c_spoh
c_stoh
c_gwt"
c_ewt"
c_fuelcap"
c_net"
replace logical valuesl
c_lmb"
c_adf"
c_audpan
c_autop"
c_deice"
c_dme"
c_elt"
c_glidesl"
c_hsi"
c_navcom1"
c_navcom2"
c_radar"
c_radaral"
c_rmi"
c_rnav
c_xpndr"
Update status box
Record "
appended"
Record "
saved
AirMemo_Click
Edit memo. Always have an ENABLED form showing to act aso
parent to the memo window.E
save rec num to goto later
make sure form has focus
c_memo#
in case someone changed
Form_Paint